home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / WimpSWIs / s / 40RepErrR < prev    next >
Text File  |  1995-08-26  |  495b  |  23 lines
  1. ; Wimp_ReportErrorR
  2. ; - a version of Wimp_ReportError that actually returns the value (which
  3. ;   button was clicked) that the SWI call returns.
  4. ;   Jason Williams 1993
  5.  
  6.         GET     ^.h.regdefs
  7.         GET     ^.h.swinos
  8.         GET     ^.h.macros
  9. ;
  10.         PREAMBLE
  11.         STARTCODE Wimp_ReportErrorR
  12. ;
  13. ;        STMFD   sp!, {lr}
  14.         MOV     ip, lr
  15.  
  16.         SWI     SWI_Wimp_ReportError + XOS_Bit
  17.         MOV     a1, a2
  18.  
  19.         MOVS    pc, ip
  20. ;        LDMFD   sp!, {pc}^
  21. ;
  22.         END
  23.